1    @echo off
  2    if not x%menu%==x goto MAINMENU
  3    goto more1
  4    rem REPLY.COM SETS THE CORRESPONDING DECIMAL VALUE OF THE ASCII
  5    rem KEY PRESSED INTO THE DOS ERRORLEVEL REGISTER  -----
  6    rem F1=59, F2=-60, F3=-61, F4=-62,  F5=-63,  y=121,  Y=89,  n=78,
  7    N=110, ESCP=27!
  8    :PAGEDOWN
  9    if %menu%==1 goto more2
 10    if %menu%==2 goto more3
 11    goto more1
 13    :PAGEUP
 14    if %menu%==1 goto more3
 15    if %menu%==2 goto more1
 16    goto more2
 18    :more1
 19    set menu=1
 20    goto mainmenu
 21    :more2
 22    set menu=2
 23    goto mainmenu
 24    :more3
 25    set menu=3
 26    :mainmenu
 27    c:
 28    CD \
 29    show DIRECTR%MENU%  <ALSO SEE PAINTSCR.BAT & .DOC>
 30    BATMOUSE
 31    if not %vc%==- goto mouse
 34    if errorlevel 67 if not errorlevel 68 goto pagedown
 35    if errorlevel 81 if not errorlevel 82 goto f8
 36    if errorlevel 27 if not errorlevel 28 goto F8
 37    if errorlevel 66 if not errorlevel 67 goto F8
 38    if errorlevel 113 if not errorlevel 114 goto F8
 39    if errorlevel 65 if not errorlevel 66 goto F7%menu%
 40    if errorlevel 64 if not errorlevel 65 goto F6%menu%
 41    if errorlevel 63 if not errorlevel 64 goto F5%menu%
 42    if errorlevel 62 if not errorlevel 63 goto F4%menu%
 43    if errorlevel 61 if not errorlevel 62 goto F3%menu%
 44    if errorlevel 60 if not errorlevel 61 goto F2%menu%
 45    if errorlevel 59 if not errorlevel 60 goto F1%menu%
 46    goto badkey
 47    :mouse
 48    if %hr%==1 goto pageup
 49    if %hr%==25 goto pagedown
 50    if %hr%==2 goto pageup
 51    if %hr%==24 goto pagedown
 52    if %hr%==3 goto pageup
 53    if %hr%==22 goto pagedown
 54    if %hr%==4 goto pageup
 55    if %hr%==23 goto pagedown
 56    if %hr%==13 goto callprog
 57    if %hr%==14 goto callprog
 58    if %hr%==15 goto callprog
 59    if %hr%==16 goto callprog
 60    goto badkey
 61    :callprog
 62    if %vc%==8 goto F1%menu%
 63    if %vc%==9 goto F1%menu%
 64    if %vc%==19 goto F2%menu%
 65    if %vc%==20 goto F2%menu%
 66    if %vc%==29 goto F3%menu%
 67    if %vc%==30 goto F3%menu%
 68    if %vc%==38 goto F4%menu%
 69    if %vc%==39 goto F4%menu%
 70    if %vc%==47 goto F5%menu%
 71    if %vc%==48 goto F5%menu%
 72    if %vc%==56 goto F6%menu%
 73    if %vc%==57 goto F6%menu%
 74    if %vc%==65 goto F7%menu%
 75    if %vc%==66 goto F7%menu%
 76    if %vc%==73 goto F8
 77    if %vc%==74 goto F8
 78    :badkey
 79    echo 
 80    goto MAINMENU
 81    :F11
 82    \misc\show F1
 83    SET PROGTODO=WS
 84    goto END
 85    :F21
 86    show F2
 87    SET PROGTODO=PWR
 88    goto END
 89    :F31
 90    show F3
 91    SET PROGTODO=LI
 92    goto END
 93    :F41
 94    show F4
 95    SET PROGTODO=FORM
 96    goto END
 97    :F51
 98    :\misc\show F5
 99    SET PROGTODO=HIJ
100    GOTO END
101    :F61
102    SET PROGTODO=FOTO
103    GOTO END
104    :F71
105    \misc\show F7
106    SET PROGTODO=PB
107    GOTO END
108    :F12
109    SET PROGTODO=SAY
110    GOTO END
111    :F22
112    cd \windows
113    win
114    goto MAINMENU
115    :F32
116    SET PROGTODO=cards
117    GOTO END
118    :F42
119    SET PROGTODO=MORT
120    GOTO END
121    :F52
122    SET PROGTODO=BACKEMUP
123    GOTO END
124    :F62
125    CALL norton
126    goto MAINMENU
127    :F72
128    cd \wolf3d
129    call wolf3d
130    GOTO MAINMENU
131    :F13
132    \misc\show ACAD
133    SET PROGTODO=ACAD
134    GOTO END
135    :F23
136    \tree86\tree86
137    goto MAINMENU
138    :F33
139    SET PROGTODO=QB
140    GOTO END
141    :F43
142    chngbkup
143    goto MAINMENU
144    :F53
145    CALL \tapesyst
146    goto MAINMENU
147    :F63
148    CD \PKMENU
149    CALL PKZMENU
150    CD \
151    goto MAINMENU
152    :F73
153    CD \DSKLIST
154    CALL DISKLIST
155    CD \
156    goto MAINMENU
157    :F8
158    SET PROGTODO=ECHO PRESS "F11" TO RUN AGAIN!
159    CLS
160    :END
161    %PROGTODO%